home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / Clean 1.2.4 / IOInterface / dialogDevice.dcl < prev    next >
Encoding:
Modula Definition  |  1997-02-06  |  199 b   |  10 lines  |  [TEXT/3PRM]
  1. definition module dialogDevice;
  2.  
  3. //    Version 0.8 to 1.0
  4.  
  5. import    ioState;
  6.  
  7.  
  8. DialogFunctions    :: DeviceFunctions s;
  9. DoModalDialog    :: !(DialogDef *s (IOState *s))    !*s    !(IOState *s) -> (!*s, !IOState *s);
  10.